perl hash variable

visit shbcf.ru